home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Graphics / Misc / Wood.0.72 / Sources / StyleInspector.m < prev    next >
Encoding:
Text File  |  1995-09-11  |  2.1 KB  |  112 lines
  1. #import <misckit/MiscSliderField.h>
  2.  
  3. #import "StyleInspector.h"
  4. #import "Tree.h"
  5.  
  6. @implementation StyleInspector
  7.  
  8. - init
  9. {  
  10.        [super init];
  11.     view = nil;    
  12.     return self;
  13. }
  14.    
  15. - (BOOL)wantsButtons 
  16. { 
  17.     return NO; 
  18. }
  19.  
  20. - (BOOL)doesHandleSelection
  21. {
  22.     char buf[MAXPATHLEN + 1];
  23.     id bundle;
  24.     
  25.     if([self selectionCount] == 1 && [[self selection] isMemberOf:[Tree class]]){
  26.         if(!view){
  27.              bundle = [NXBundle mainBundle];
  28.             [bundle getPath:buf forResource:"StyleInspector" ofType:"nib"];
  29.                [NXApp loadNibFile:buf owner:self withNames:NO fromZone:[self zone]];
  30.         }
  31.         return YES;
  32.     }
  33.     return NO;
  34. }
  35.  
  36. - ok:sender
  37. {
  38.     [(NXColorWell *)fillColor deactivate];
  39.     [(NXColorWell *)textColor deactivate];
  40.     [(NXColorWell *)outlineColor deactivate]; 
  41.     return [super ok:sender];
  42. }
  43.  
  44. - revert:sender
  45. {
  46.     id tree;
  47.     
  48.     [super revert:sender];
  49.     tree = [self selection];
  50.     [form selectCellAt:[tree pathKind] :0];
  51.     [outline setState:[tree outline]];
  52.     [fillColor setColor:[tree fillColor]];
  53.     [textColor setColor:[tree textColor]];
  54.     [outlineColor setColor:[tree outlineColor]];
  55.     [outlinewidth setFloatValue:[tree linewidth]];
  56.     [nodeEnding selectCellAt:[tree ending] :0];
  57.     [parentEnding selectCellAt:[tree parentEnding] :0];
  58.     [nodeEnding scrollCellToVisible:[tree ending] :0];
  59.     [parentEnding scrollCellToVisible:[tree parentEnding] :0];
  60.     return self;
  61. }
  62.  
  63. - changeParentEnding:sender
  64. {
  65.     [[self selection] setParentEnding:[[sender selectedCell] tag]];
  66.     return self;
  67. }
  68.  
  69. - changeNodeEnding:sender
  70. {
  71.     [[self selection] setEnding:[[sender selectedCell] tag]];
  72.     return self;
  73. }
  74.  
  75. - changeForm:sender
  76. {
  77.     [[self selection] setPathKind:[[sender selectedCell] tag]];
  78.     return self;
  79. }
  80.  
  81. - changeOutline:sender
  82. {
  83.     [[self selection] setOutline:[sender state]];
  84.     return self;
  85. }
  86.  
  87. - changeFillColor:sender
  88. {
  89.     [[self selection] setFillColor:[sender color]];
  90.     return self;
  91. }
  92.  
  93. - changeTextColor:sender
  94. {
  95.     [[self selection] setTextColor:[sender color]];
  96.     return self;
  97. }
  98.  
  99. - changeOutlineColor:sender
  100. {
  101.     [[self selection] setOutlineColor:[sender color]];
  102.     return self;
  103. }
  104.  
  105. - changeOutlinewidth:sender
  106. {
  107.     [[self selection] setLinewidth:[sender floatValue]];
  108.     return self;
  109. }
  110.   
  111. @end
  112.